home *** CD-ROM | disk | FTP | other *** search
/ QRZ! Ham Radio 8 / QRZ Ham Radio Callsign Database - Volume 8.iso / pc / files / infodata / 610_ps.txt < prev    next >
Text File  |  1996-06-25  |  34KB  |  1,056 lines
  1. Newsgroups: rec.radio.amateur.policy
  2. Path: news.unomaha.edu!news.nevada.edu!news.tamu.edu!cs.utexas.edu!usc!nic-nac.CSU.net!charnel.ecst.csuchico.edu!olivea!quack!quack.kfu.com!nsayer
  3. From: nsayer@quack.kfu.com (Nick Sayer)
  4. Subject: Homebrew 610 forms, first release
  5. Message-ID: <ggOMKGa@quack.kfu.com>
  6. Sender: news@quack.kfu.com (0000-News(0000))
  7. Organization: The Duck Pond public unix: +1 408 249 9630, log in as 'guest'.
  8. Date: 4 May 1994 02:28:58 UTC
  9. Lines: 1045
  10.  
  11. This has now been posted to comp.lang.postscript. Presuming that it
  12. is approved by the moderator, it will thus be archived at your favorite
  13. comp.lang.postscript archive site.
  14.  
  15. --
  16.  
  17. The postscript program below will generate Federal Communications
  18. Commission form 610, an application for an Amateur Radio license.
  19.  
  20. This program will even fill the form out for you if you prepend
  21. a dictionary to the front with the appropriate key/value pairs
  22. set. See the README file.
  23.  
  24. ----- fcc610.README -----
  25. If you want to use this code to generate a pre-filled 610 form, you need
  26. to prepend the code with a postscript file containing a dictionary
  27. called FORM. The key-value pairs in FORM are listed below. If a key
  28. is not present in the dictionary, the data it represents will be left
  29. blank. Boolean fields place an "X" in the appropriate box if true.
  30. date-string fields must be strings consisting of 6 numeric digits,
  31. month, day, year. Be sure to zero-pad if a month or day is less than 10.
  32.  
  33. Key        Type        Description        Location
  34.  
  35. /FIRST        string        First name        1
  36. /MIDDLE        string        Middle Initial        1
  37. /LAST        string        Last name         1
  38. /SUFFIX        string        Suffix (Jr, Sr, etc)    1
  39. /BIRTH        date-string    Date of birth        2
  40. /STREET        string        street address        3
  41. /CITY        string        city            3
  42. /STATE        string        state            3
  43. /ZIP        string        ZIP code        3
  44. /4A        boolean        New license        4A
  45. /4B        boolean        Upgrade            4B
  46. /4C        boolean        Name change        4C
  47. /4D        boolean        Address change        4D
  48. /4E        boolean        Callsign change        4E
  49. /4F        boolean        Renew            4F
  50. /OLDFIRST    string        Prior first name    4C
  51. /OLDMIDDLE    string        Prior middle initial    4C
  52. /OLDLAST    string        Prior last name        4C
  53. /OLDSUFFIX    string        Prior suffix        4C
  54. /CALL        string        Callsign        5A
  55. /CLASS        string        Operator class        5B
  56. /6N        boolean        No environmental impact    6
  57. /6Y        boolean        Yes, env. impact    6
  58. /PURPOSE    string        Purpose of prev. appl.    7A
  59. /FILED        date-string    date prev. appl. filed    7B
  60. /SIGNED        date-string    date signed        9
  61. /NOVICE        boolean        qualified for Novice    A
  62. /TECH        boolean        qualified for Tech    A
  63. /TECH-PLUS    boolean        qualified for Tech+    A
  64. /GENERAL    boolean        qualified for General    A
  65. /ADVANCED    boolean        qualified for Adv.    A
  66. /EXTRA        boolean        qualified for Extra    A
  67. /VEC        string        Name of VEC        C
  68. /SESSION-DATE    string        date of session        D
  69. /SESSION-LOC    string        Location of session    E
  70. /VE1-NAME    string        VE #1's name
  71. /VE1-CALL    string        VE #1's call
  72. /VE1-SIGNED    string        VE #1 date signed
  73.  
  74. (last 3 fields repeated for VE2 and VE3)
  75.  
  76. Example (level 2 postscript):
  77.  
  78. %!
  79.  
  80. /FORM <<
  81.  
  82. /FIRST (Bartholemew)
  83. /MIDDLE (J)
  84. /LAST (Simpson)
  85. /STREET (1123 Anystreet)
  86. /CITY (Springfield)
  87. /STATE (IL)
  88. /ZIP (00000)
  89. /BIRTH (122088)
  90. /CALL (N4QRT)
  91. /CLASS (General)
  92. /4D true
  93. /6N true
  94. /SIGNED (050394)
  95.  
  96. >> def
  97.  
  98. Prepending that would print out a 610 form suitable for a change
  99. of address.
  100. ----- ereh tuc -----
  101.  
  102. ----- fcc610.ps -----
  103. %!PS-Adobe-3.0
  104. %%BoundingBox: 26 29 588 772
  105. %%LanguageLevel: 2
  106. %%PageOrder: Ascend
  107. %%Requirements: duplex
  108. %%Title: FCC_form_610
  109. %%Creator: Nick_Sayer
  110. %%Pages: 2
  111. %%DocumentNeededResources: font Helvetica Helvetica-Bold ZapfDingbats Courier
  112. %%EndComments
  113. %%BeginProlog
  114. %%EndProlog
  115. %%BeginSetup
  116. %
  117. % FCC610.PS
  118. % Federal Communications Commission form 610
  119. % Version number kept below
  120. % Written by Nick Sayer, N6QQQ
  121. % I don't think I can claim copyright on this since it is a federal
  122. % form.
  123. %
  124. % THIS VERSION HAS NOT BEEN SUBMITTED TO THE FCC FOR APPROVAL, NOR HAS
  125. % IT BEEN ACTUALLY USED IN APPLICATIONS TO THE COMMISSION. IF YOU USE
  126. % THIS FORM AND THE FCC KICKS IT BACK, IT'S NOT MY FAULT. I would like
  127. % any feedback with regards to acceptability of forms generated by
  128. % this code.
  129. %
  130. % One hint: The paper color is critical. I have submitted 610 forms
  131. % photocopied onto 'Goldenrod' paper and have had them accepted,
  132. % but white won't work. The FCC uses paper color to sort the forms
  133. % from various services out more easily or something.
  134. %
  135. % The source for this form is the 11/93 version of the form.
  136. % The original indicia (here deleted per FCC policy) said
  137. % 3060-0033, expires 08/31/95.
  138. %
  139. % The form was carefully measured with a ruler to the nearest millimeter.
  140. %
  141. % Here are the differences you may note in the form:
  142. %
  143. % 1. OMB notation at upper left omitted.
  144. %    This in keeping with FCC policy for privately generated forms.
  145. %
  146. % 2. Possible measurement errors.
  147. %    I only measured to the nearest 1 mm. Some lines had to be moved
  148. %    very slightly to make room for the font I used (especially in
  149. %    section 2A).
  150. %
  151. % 3. There is a version number in the top right corner of the back.
  152. %    Delete it if you like. I'd go nuts without it given how many
  153. %    times I've printed these out.
  154. %
  155. % 4. Helvetica is the closest font I could find to the one the FCC
  156. %    used. It's not an exact match. Their font is certainly a
  157. %    sans-serif font but it's thinner. I think it's close enough.
  158. %
  159. % Any other differences are probably bugs.
  160. %
  161. % This version has been tested under Ghostscript, NeWSprint 2.0 and
  162. % OpenWindows 3.3 DPS (pageview). The date-line procedure produces
  163. % eroneous results under NeWSprint, but I think it's a NeWS bug.
  164. % Apart from that, it works fine on all the platforms I've tried.
  165. %
  166. % This version allows you to prepend a dictionary to this file. The
  167. % dictionary will be used to fill out the front (only) of the form.
  168. % See the accompanying README file for a list of dictionary entries.
  169. % The fields will be filled out in Courier 12 pitch font so that it
  170. % looks just like a typewriter.
  171. %
  172. % VEs may wish to print a large number of forms back-only in advance of
  173. % a test session, then load all of the resulting pages in a laser
  174. % printer at the test session. Then for each examinee they can run a
  175. % program that will pre-pend the dictionary as appropriate and 
  176. % run the first page only. The result would be a fully-filled
  177. % 610 form ready for 4 signatures. If you do this, you'll want to
  178. % use one of the many EPS page splitter programs to make front-only
  179. % and back-only renditions.
  180.  
  181. /VERSION (V3.01) def
  182.  
  183. /inch { 72 mul } def
  184. /cm { 2.54 div inch } def
  185. /mm { 25.4 div inch } def
  186.  
  187. %%IncludeResource: font Courier
  188. /FILLIN-FONT (Courier) findfont def
  189. %%IncludeResource: font Helvetica
  190. /NORMAL-FONT (Helvetica) findfont def
  191. %%IncludeResource: font Helvetica-Bold
  192. /BOLD-FONT (Helvetica-Bold) findfont def
  193. %%IncludeResource: font ZapfDingbats
  194. /DING-FONT (ZapfDingbats) findfont def
  195.  
  196. /center-text % string --
  197. {
  198.   dup stringwidth pop 2 div currentpoint pop exch sub currentpoint
  199.   exch pop moveto show
  200. } def
  201.  
  202. /right-justify % --
  203. {
  204.   dup stringwidth pop currentpoint pop exch sub currentpoint
  205.   exch pop moveto show
  206. } def
  207.  
  208. % we want a justify-text % x1 x2 y string --
  209. % It's going to have to take the difference between x2-x1 and
  210. % {string stringwidth}, divide that by {string length}, and
  211. % use the result as the x argument to ashow.
  212.  
  213. /justify-text % x1 x2 y string --
  214. {
  215.   3 index 2 index moveto
  216.   3 index 3 index exch sub
  217.   1 index stringwidth pop sub
  218.   1 index length div 0 2 index ashow
  219.   pop pop pop pop
  220. } def
  221.  
  222. % Well, this is supposed to be the level 2 way to print on both
  223. % sides, but ghostscript heaves up when I try it. This bit of code
  224. % may also make Level 1 parsers lose their minds, so comment it out
  225. % if it gives you trouble.
  226. %
  227. systemdict /setpagedevice known { << /Duplex true >> setpagedevice } if
  228.  
  229. % And for those who only have level 1, we can work around glyphshow.
  230. % It is, however, the prefered method of doing this sort of thing.
  231. %
  232. systemdict /glyphshow known
  233.  { /DING-SIGN { /a22 glyphshow } def /DING-ARROW { /a186 glyphshow } def }
  234.  { /DING-SIGN { <36> show } def /DING-ARROW { <F8> show } def }
  235. ifelse
  236.  
  237. %%EndSetup
  238. %%Page: "front" 1
  239. % Everything is relative to the bottom-left corner of the main box.
  240. % So to make it fit on the page, we have to shove it around a bit.
  241.  
  242. .9 cm 1.6 cm translate
  243.  
  244. % There are two very thick boxes near the top and middle
  245.  
  246. /headerbox % x y --
  247. {
  248. moveto
  249.  
  250. gsave
  251.  
  252. 2 setlinewidth
  253.  
  254. % This is kind of a bitch. Because PostScript centers the setlinewidth
  255. % on the center of the line, we need to tweak the heavily drawn boxes
  256. % by both their width and the width of the lines they're butting up
  257. % to. That means moving in 1.75 points, not 2.
  258.  
  259. .75 0 rmoveto
  260. 198 mm 1.5 sub 0 rlineto 0 6 mm rlineto -198 mm 1.5 add 0 rlineto closepath
  261. stroke
  262.  
  263. grestore gsave % to rescue the currentpoint.
  264.  
  265. % Now the little vertical lines
  266.  
  267. 1 setlinewidth
  268.  
  269. 35 mm 0 rmoveto 0 6 mm rlineto 198 35 2 mul sub mm 0 rmoveto 0 -6 mm
  270. rlineto stroke
  271.  
  272. grestore gsave % again...
  273.  
  274. % Things just get a bunch worse here.
  275.  
  276. .95 setgray 1.25 1 rmoveto 35 mm 1.75 sub 0 rlineto 0 6 mm 2 sub rlineto
  277. -35 mm 1.75 add 0 rlineto closepath fill
  278.  
  279. grestore gsave % one more time.
  280.  
  281. .95 setgray 198 mm 1.25 sub 1 rmoveto -35 mm 1.75 add 0 rlineto 0 6 mm 2 sub
  282. rlineto 35 mm 1.75 sub 0 rlineto closepath fill
  283.  
  284. grestore
  285.  
  286. } def
  287.  
  288. 0 232 mm headerbox
  289. 0 101 mm headerbox
  290.  
  291. % The rest of the lines are a half point wide
  292.  
  293. .5 setlinewidth
  294.  
  295. % The main box
  296.  
  297. newpath 0 232 mm moveto 0 0 lineto 198 mm 0 lineto 198 mm 232 mm lineto
  298. stroke
  299.  
  300. % Now all the full-length horizontal lines
  301.  
  302. /full-line % y --
  303. {
  304. dup 0 exch moveto 198 mm exch lineto stroke
  305. } def
  306.  
  307. 11 mm full-line
  308. 24 mm full-line
  309. 37 mm full-line
  310. 45 mm full-line
  311. 120 mm full-line
  312. 131 mm full-line
  313. 138 mm full-line
  314. 150 mm full-line
  315. 157 mm full-line
  316. 168 mm full-line
  317. 210 mm full-line
  318. 220 mm full-line
  319.  
  320. % Now all the vertical lines dividing those stripes
  321.  
  322. 66 mm 0 moveto 66 mm 37 mm lineto
  323. 99 mm 0 moveto 99 mm 37 mm lineto
  324. 169 mm 0 moveto 169 mm 37 mm lineto
  325. stroke
  326.  
  327. 119 mm 45 mm moveto 119 mm 101 mm lineto stroke
  328.  
  329. 155 mm 107 mm moveto 155 mm 120 mm lineto stroke
  330. 155 mm 138 mm moveto 155 mm 150 mm lineto stroke
  331. 67 mm 138 mm moveto 67 mm 150 mm lineto stroke
  332.  
  333. 88 mm 157 mm moveto 88 mm 168 mm lineto stroke
  334. 139 mm 157 mm moveto 139 mm 168 mm lineto stroke
  335.  
  336. 84 mm 210 mm moveto 84 mm 232 mm lineto stroke
  337. 137 mm 210 mm moveto 137 mm 232 mm lineto stroke
  338. 158 mm 210 mm moveto 158 mm 232 mm lineto stroke
  339.  
  340. % Now all the horizontal lines dividing up the resulting cubes
  341.  
  342. 0 mm 68 mm moveto 119 mm 68 mm lineto stroke
  343. 0 mm 56 mm moveto 119 mm 56 mm lineto stroke
  344.  
  345. % Now once again we divide up the resulting slices
  346.  
  347. 62 mm 45 mm moveto 62 mm 56 mm lineto stroke
  348.  
  349. % Now we start scribbling. TOP SECTION
  350.  
  351. NORMAL-FONT 8 scalefont setfont
  352. 0 253 mm moveto (FEDERAL COMMUNICATIONS COMMISSION) show
  353. 0 250 mm moveto (GETTYSBURG, PENNSYLANIA) show
  354. 182 mm 246 mm moveto (See instructions for) center-text
  355. 182 mm 243 mm moveto (information regarding) center-text
  356. 182 mm 240 mm moveto (public burden estimate.) center-text
  357.  
  358. BOLD-FONT 14 scalefont setfont
  359. 99 mm 246 mm moveto (APPLICATION FORM 610 FOR) center-text
  360. 99 mm 240 mm moveto (AMATEUR OPERATOR/PRIMARY STATION LICENSE) center-text
  361.  
  362. BOLD-FONT 10 scalefont setfont
  363. 99 mm 234 mm moveto
  364.  (SECTION 1 - TO BE COMPLETED BY APPLICANT \(See instructions\))
  365. center-text
  366. 99 mm 103 mm moveto
  367.  (SECTION 2 - TO BE COMPLETED BY ALL ADMINISTERING VE's)
  368. center-text
  369.  
  370. BOLD-FONT 8 scalefont setfont
  371. 99 mm 38 mm moveto
  372. (WITH THE INSTRUCTIONS PROVIDED BY THE COORDINATING VEC AND THE FCC)
  373. center-text
  374. 99 mm 42 mm moveto
  375. (I CERTIFY THAT I HAVE COMPLIED WITH THE ADMINISTERING VE REQUIREMENTS IN PART 97 OF THE COMMISSION'S RULES AND)
  376. center-text
  377.  
  378. /box % --
  379. { currentpoint newpath moveto .3 cm 0 cm rlineto 0 cm .3 cm rlineto
  380.   -.3 cm 0 cm rlineto closepath stroke }
  381. def
  382.  
  383. NORMAL-FONT 8 scalefont setfont
  384.  
  385. 1 mm 229 mm moveto (1. Print or type last name) show
  386. 65 mm 229 mm moveto (Suffix) show
  387. 85 mm 229 mm moveto (First name) show
  388. 138 mm 229 mm moveto (Middle initial) show
  389. 159 mm 229 mm moveto (2. Date of birth) show
  390. 1 mm 217 mm moveto (3. Mailing address \(Number and street\)) show
  391. 85 mm 217 mm moveto (City) show
  392. 138 mm 217 mm moveto (State code) show
  393. 159 mm 217 mm moveto (ZIP code) show
  394.  
  395. /date-line
  396. {
  397. gsave
  398. 0 mm 6 rmoveto
  399. [ 5 mm 1 mm 5 mm 2 mm ] 0 setdash
  400. 39 mm 0 rlineto stroke
  401. grestore gsave
  402. [ 0 11 mm 2 mm 11 mm 2 mm 11 mm ] 1 setdash
  403. 0 mm 12 rmoveto
  404. 35 mm 0 rlineto stroke
  405. grestore gsave
  406. NORMAL-FONT 8 scalefont setfont
  407. (month) show
  408. grestore gsave
  409. 15 mm 0 rmoveto
  410. NORMAL-FONT 8 scalefont setfont
  411. (day) show
  412. grestore gsave
  413. 26 mm 0 rmoveto
  414. NORMAL-FONT 8 scalefont setfont
  415. (year) show
  416. grestore
  417. } def
  418.  
  419. 160 mm 221 mm moveto date-line
  420.  
  421. 1 mm 207 mm moveto (4. I HEREBY APPLY FOR \(make an X in the ) show
  422. (appropriate box\(es\)\):) show
  423.  
  424. 7 mm 199 mm moveto (4A. ) show 13 mm 199 mm moveto box
  425. BOLD-FONT 10 scalefont setfont
  426. 18 mm 199 mm moveto (EXAMINATION ) show
  427. NORMAL-FONT 8 scalefont setfont
  428. ( for a new license) show
  429.  
  430. 7 mm 190 mm moveto (4B. ) show 13 mm 190 mm moveto box
  431. BOLD-FONT 10 scalefont setfont
  432. 18 mm 190 mm moveto (EXAMINATION ) show
  433. NORMAL-FONT 8 scalefont setfont
  434. ( for upgrade of my operator license) show
  435. 18 mm 187 mm moveto (class) show
  436.  
  437. 7 mm 180 mm moveto (4C. ) show 13 mm 180 mm moveto box
  438. BOLD-FONT 10 scalefont setfont
  439. 18 mm 180 mm moveto (CHANGE ) show
  440. NORMAL-FONT 8 scalefont setfont
  441. ( my name on my license to my new) show
  442. 18 mm 177 mm moveto (name in item 1. My former name was:) show
  443.  
  444. 18 mm 172 mm moveto 94 mm 172 mm lineto stroke
  445. 18 mm 169 mm moveto (\(Last name\)) show
  446. 41 mm 169 mm moveto (\(Suffix\)) show
  447. 57 mm 169 mm moveto (\(First name\)) show
  448. 86 mm 169 mm moveto (\(MI\)) show
  449.  
  450. 110 mm 199 mm moveto (4D. ) show 116 mm 199 mm moveto box
  451. BOLD-FONT 10 scalefont setfont
  452. 121 mm 199 mm moveto (CHANGE ) show
  453. NORMAL-FONT 8 scalefont setfont
  454. ( my mailing address on my license to) show
  455. 121 mm 196 mm moveto (my new address in item 3.) show
  456.  
  457. 110 mm 190 mm moveto (4E. ) show 116 mm 190 mm moveto box
  458. BOLD-FONT 10 scalefont setfont
  459. 121 mm 190 mm moveto (CHANGE ) show
  460. NORMAL-FONT 8 scalefont setfont
  461. ( my station call sign systematically) show
  462. 121 mm 187 mm moveto (\(See instructions\)) show
  463. 121 mm 184 mm moveto (Applicant's initials: ) show
  464. 20 mm 0 rlineto stroke
  465.  
  466. 110 mm 173 mm moveto (4F. ) show 116 mm 173 mm moveto box
  467. BOLD-FONT 10 scalefont setfont
  468. 121 mm 173 mm moveto (RENEWAL ) show
  469. NORMAL-FONT 8 scalefont setfont
  470. ( of my license) show
  471.  
  472. 1 mm 165 mm moveto (5.) show
  473. 5 mm 83 mm 165 mm
  474. (Unless you are requesting a new license, attach the) justify-text
  475. 5 mm 83 mm 162 mm
  476. (original or a photocopy of your license to the back of this) justify-text
  477. 5 mm 159 mm moveto
  478. (Form 610 and complete items 5A and 5B.) show
  479. 90 mm 165 mm moveto (5A. Call sign shown on license) show
  480. 141 mm 165 mm moveto (5B. Operator class shown on license) show
  481.  
  482. 1 mm 154 mm moveto (6.) show
  483. 5 mm 154 mm moveto (Would an FCC grant of your request be an ) show
  484. (action that may) show
  485. 5 mm 151 mm moveto (have a significant environmental effect?) show
  486. BOLD-FONT 10 scalefont setfont
  487. 110 mm 151 mm moveto box
  488. 115 mm 151 mm moveto (NO) show
  489. 134 mm 151 mm moveto box
  490. 139 mm 151 mm moveto (YES ) show
  491. NORMAL-FONT 8 scalefont setfont
  492. 0 1 mm rmoveto
  493. ( \(Attach required statement\)) show
  494.  
  495. 1 mm 147 mm moveto (7.) show
  496. 5 mm 65 mm 147 mm (If you have filed another Form 610 that we) justify-text
  497. 5 mm 65 mm 144 mm (have not acted upon, complete items 7A) justify-text
  498. 5 mm 141 mm moveto (and 7B.) show
  499. 68 mm 147 mm moveto (7A. Purpose of other form) show
  500. 157 mm 147 mm moveto (7B. Date filed) show
  501. 160 mm 139 mm moveto date-line
  502.  
  503. NORMAL-FONT 6.5 scalefont setfont
  504. 99 mm 135 mm moveto
  505. (WILLFUL FALSE STATEMENTS MADE ON THIS FORM ARE PUNISHABLE BY FINE AND/OR IMPRISONMENT, \(U.S. CODE, TITLE 18, SECTION 1001\), AND/OR REVOCATION OF)
  506. center-text
  507. 99 mm 132 mm moveto
  508. (ANY STATION LICENSE OR CONSTRUCTION PERMIT \(U.S. CODE, TITLE 47, SECTION 312\(A\)\(1\)\) AND/OR FORFEITURE \(U.S. CODE, TITLE 47, SECTION 503\).)
  509. center-text
  510.  
  511. 2 mm 196 mm 128 mm
  512. (I CERTIFY THAT ALL STATEMENTS AND ATTACHMENTS ARE TRUE, COMPLETE, AND CORRECT TO THE BEST OF MY KNOWLEDGE AND BELIEF AND ARE MADE IN GOOD)
  513. justify-text
  514. 2 mm 196 mm 125 mm
  515. (FAITH; THAT I AM NOT A REPRESENTATIVE OF A FOREIGN GOVERNMENT; THAT I WAIVE ANY CLAIM TO THE USE OF A PARTICULAR FREQUENCY REGARDLESS OF)
  516. justify-text
  517. 2 mm 122 mm moveto
  518. (PRIOR USE BY LICENSE OR OTHERWISE; AND THAT THE STATION TO BE ) show
  519. (LICENSED WILL BE INACCESSIBLE TO UNAUTHORIZED PERSONS.) show
  520.  
  521. NORMAL-FONT 8 scalefont setfont
  522. 1 mm 117 mm moveto (8.) show
  523. 5 mm 117 mm moveto
  524. (Signature of applicant \(Do not print, type or stamp.) show
  525. (\)    \(Must match name in item 1.\)) show
  526. 157 mm 117 mm moveto (9. Date signed) show
  527. 160 mm 108 mm moveto date-line
  528. BOLD-FONT 14 scalefont setfont
  529. DING-FONT 14 scalefont setfont
  530. 6 mm 110 mm moveto DING-SIGN
  531. 10 mm 110 mm moveto 152 mm 110 mm lineto stroke
  532.  
  533. % BOTOM SECTION
  534.  
  535. NORMAL-FONT 8 scalefont setfont
  536.  
  537. 1 mm 97 mm moveto (A.) show
  538. 5 mm 97 mm moveto (Applicant is qualified for operator license class:)
  539. show
  540. 120 mm 97 mm moveto (B. VEC receipt date:) show
  541.  
  542. 1 mm 64 mm moveto (C.) show
  543. 5 mm 64 mm moveto (Name of Volunteer-Examiner Coordinator \(VEC\):) show
  544. 1 mm 53 mm moveto (D.) show
  545. 5 mm 53 mm moveto (Date of VEC coordinated examination) show
  546. 5 mm 50 mm moveto (session:) show
  547. 63 mm 53 mm moveto (E. Examination session location:) show
  548.  
  549. /ve-line % y --
  550. {
  551. dup 67 mm exch moveto (VE's station call sign) show
  552. dup 100 mm exch moveto (VE's signature \(must match name\)) show
  553. 170 mm exch moveto (Date signed) show
  554. } def
  555.  
  556. 1 mm 34 mm moveto (1st VE's name  \(Print First, MI, Last, Suffix\)) show
  557. 34 mm ve-line
  558. 1 mm 21 mm moveto (2nd VE's name  \(Print First, MI, Last, Suffix\)) show
  559. 21 mm ve-line
  560. 1 mm 8 mm moveto (3rd VE's name  \(Print First, MI, Last, Suffix\)) show
  561. 8 mm ve-line
  562.  
  563. BOLD-FONT 9 scalefont setfont
  564. 4 mm 92 mm moveto box
  565. 11 mm 92 mm moveto (NOVICE) show
  566. 50 mm 92 mm moveto (\(Elements 1\(A\), 1\(B\), or 1\(C\) and 2\)) show
  567. 4 mm 88 mm moveto box
  568. 11 mm 88 mm moveto (TECHNICIAN) show
  569. 50 mm 88 mm moveto (\(Elements 2 and 3\(A\)\)) show
  570. 4 mm 84 mm moveto box
  571. 11 mm 84 mm moveto (TECHNICIAN PLUS) show
  572. 50 mm 84 mm moveto (\(Elements 1\(A\), 1\(B\), or 1\(C\), 2 and 3\(A\)\)) show
  573. 4 mm 80 mm moveto box
  574. 11 mm 80 mm moveto (GENERAL) show
  575. 50 mm 80 mm moveto (\(Elements 1\(B\) or 1\(C\), 2, 3\(A\), and 3\(B\)\)) show
  576. 4 mm 76 mm moveto box
  577. 11 mm 76 mm moveto (ADVANCED) show
  578. 50 mm 76 mm moveto (\(Elements 1\(B\) or 1\(C\), 2, 3\(A\), 3\(B\),) show
  579. ( and 4\(A\)\)) show
  580. 4 mm 72 mm moveto box
  581. 11 mm 72 mm moveto (AMATEUR EXTRA) show
  582. 50 mm 72 mm moveto (\(Elements 1\(C\), 2, 3\(A\), 3\(B\), 4\(A\)) show
  583. ( and 4\(B\)\)) show
  584.  
  585. % Finally, right justify this bit at the bottom
  586.  
  587. NORMAL-FONT 8 scalefont setfont
  588.  
  589. 198 mm -3 mm moveto (FCC Form 610) right-justify
  590. 198 mm -6 mm moveto (November 1993) right-justify
  591.  
  592. % This is optional. Uncomment it if you wish
  593.  
  594. % 0 -3 mm moveto
  595. % (No U.S. Government funds were used to print this document.) show
  596.  
  597. % WHEW! Half way home!
  598.  
  599. % At this point it's possible that a user has pre-pended a dictionary
  600. % which we can use to actually fill out the form in Courier.
  601.  
  602. currentdict /FORM known
  603.  
  604. {
  605.   /false-or-val
  606.   {
  607.     dup FORM exch known
  608.     { FORM exch get }
  609.     { pop false } ifelse
  610.   } def
  611.  
  612.   /blank-or-val
  613.   {
  614.     dup FORM exch known
  615.     { FORM exch get }
  616.     { pop () } ifelse
  617.   } def
  618.  
  619.   /fillin-date-line % y string --
  620.   {
  621.     exch 160 mm exch moveto
  622.     12 exch 0 exch ashow
  623.   } def
  624.  
  625.   FILLIN-FONT 12 scalefont setfont
  626.  
  627.   2 mm 224 mm moveto /LAST blank-or-val show
  628.   65 mm 224 mm moveto /SUFFIX blank-or-val show
  629.   85 mm 224 mm moveto /FIRST blank-or-val show
  630.   145 mm 224 mm moveto /MIDDLE blank-or-val show
  631.  
  632.   224 mm /BIRTH blank-or-val fillin-date-line
  633.  
  634.   2 mm 212 mm moveto /STREET blank-or-val show
  635.   85 mm 212 mm moveto /CITY blank-or-val show
  636.   145 mm 212 mm moveto /STATE blank-or-val show
  637.   162 mm 212 mm moveto /ZIP blank-or-val show
  638.  
  639.   /4A false-or-val { 13 mm 199 mm moveto (X) show } if
  640.   /4B false-or-val { 13 mm 190 mm moveto (X) show } if
  641.   /4C false-or-val { 13 mm 180 mm moveto (X) show } if
  642.   /4D false-or-val { 116 mm 199 mm moveto (X) show } if
  643.   /4E false-or-val { 116 mm 190 mm moveto (X) show } if
  644.   /4F false-or-val { 116 mm 173 mm moveto (X) show } if
  645.  
  646.   18 mm 173 mm moveto /OLDLAST blank-or-val show
  647.   41 mm 173 mm moveto /OLDSUFFIX blank-or-val show
  648.   57 mm 173 mm moveto /OLDFIRST blank-or-val show
  649.   87 mm 173 mm moveto /OLDMIDDLE blank-or-val show
  650.  
  651.   93 mm 160 mm moveto /CALL blank-or-val show
  652.   145 mm 160 mm moveto /CLASS blank-or-val show
  653.  
  654.   /6N false-or-val { 110 mm 151 mm moveto (X) show } if
  655.   /6Y false-or-val { 134 mm 151 mm moveto (X) show } if
  656.  
  657.   70 mm 142 mm moveto /PURPOSE blank-or-val show
  658.   142 mm /FILED blank-or-val fillin-date-line
  659.  
  660.   111 mm /SIGNED blank-or-val fillin-date-line
  661.  
  662.   /NOVICE false-or-val { 4 mm 92 mm moveto (X) show } if
  663.   /TECH false-or-val { 4 mm 88 mm moveto (X) show } if
  664.   /TECH-PLUS false-or-val { 4 mm 84 mm moveto (X) show } if
  665.   /GENERAL false-or-val { 4 mm 80 mm moveto (X) show } if
  666.   /ADVANCED false-or-val { 4 mm 76 mm moveto (X) show } if
  667.   /EXTRA false-or-val { 4 mm 72 mm moveto (X) show } if
  668.  
  669.   4 mm 59 mm moveto /VEC blank-or-val show
  670.   4 mm 46 mm moveto /SESSION-DATE blank-or-val show
  671.   65 mm 46 mm moveto /SESSION-LOC blank-or-val show
  672.  
  673.   2 mm 26 mm moveto /VE1-NAME blank-or-val show
  674.   70 mm 26 mm moveto /VE1-CALL blank-or-val show
  675.   170 mm 26 mm moveto /VE1-SIGNED blank-or-val show
  676.  
  677.   2 mm 13 mm moveto /VE2-NAME blank-or-val show
  678.   70 mm 13 mm moveto /VE2-CALL blank-or-val show
  679.   170 mm 13 mm moveto /VE2-SIGNED blank-or-val show
  680.  
  681.   2 mm 1 mm moveto /VE3-NAME blank-or-val show
  682.   70 mm 1 mm moveto /VE3-CALL blank-or-val show
  683.   170 mm 1 mm moveto /VE3-SIGNED blank-or-val show
  684.  
  685. } if
  686.  
  687. showpage
  688.  
  689. %%Page: "back" 2
  690. % On the back, everything is relative to the bleed-through of the
  691. % main box on the front (I can just make it out under strong light).
  692. % So to make it fit on the page, we have to shove it around a bit.
  693.  
  694. .9 cm 1.6 cm translate
  695.  
  696. % There's another headerbox on the back, but the interior dimensions
  697. % are a little different, so we'll just copy the procedure and
  698. % change it a little.
  699.  
  700. /headerbox % x y --
  701. {
  702. moveto
  703.  
  704. gsave
  705.  
  706. 2 setlinewidth
  707.  
  708. % This is kind of a bitch. Because PostScript centers the setlinewidth
  709. % on the center of the line, we need to tweak the heavily drawn boxes
  710. % by both their width and the width of the lines they're butting up
  711. % to. That means moving in 1.75 points, not 2.
  712.  
  713. .75 0 rmoveto
  714. 198 mm 1.5 sub 0 rlineto 0 6 mm rlineto -198 mm 1.5 add 0 rlineto closepath
  715. stroke
  716.  
  717. grestore gsave % to rescue the currentpoint.
  718.  
  719. % Now the little vertical lines
  720.  
  721. 1 setlinewidth
  722.  
  723. 46 mm 0 rmoveto 0 6 mm rlineto 198 46 2 mul sub mm 0 rmoveto 0 -6 mm
  724. rlineto stroke
  725.  
  726. grestore gsave % again...
  727.  
  728. % Things just get a bunch worse here.
  729.  
  730. .95 setgray 1.25 1 rmoveto 46 mm 1.75 sub 0 rlineto 0 6 mm 2 sub rlineto
  731. -46 mm 1.75 add 0 rlineto closepath fill
  732.  
  733. grestore gsave % one more time.
  734.  
  735. .95 setgray 198 mm 1.25 sub 1 rmoveto -46 mm 1.75 add 0 rlineto 0 6 mm 2 sub
  736. rlineto 46 mm 1.75 sub 0 rlineto closepath fill
  737.  
  738. grestore
  739.  
  740. } def
  741.  
  742. 0 213 mm headerbox
  743.  
  744. % The rest of the lines are a half point wide
  745.  
  746. .5 setlinewidth
  747.  
  748. % The main box for the back
  749.  
  750. 0 120 mm moveto 0 254 mm lineto 198 mm 254 mm lineto
  751. 198 mm 120 mm lineto closepath stroke
  752.  
  753. % This may cause problems with the commission. If you don't want it,
  754. % comment it out.
  755. NORMAL-FONT 4 scalefont setfont
  756. 198 mm 254.5 mm moveto VERSION right-justify
  757.  
  758. NORMAL-FONT 10 scalefont setfont
  759.  
  760. 2 mm 250 mm moveto
  761. (ATTACH ORIGINAL OR A PHOTOCOPY OF YOUR LICENSE HERE:) show
  762.  
  763. BOLD-FONT 10 scalefont setfont
  764.  
  765. 99 mm 215 mm moveto
  766. (SECTION 3 - TO BE COMPLETED BY PHYSICIAN) center-text
  767.  
  768. 27 mm 207 mm moveto (PHYSICIAN'S CERTIFICATION) center-text
  769. 27 mm 203 mm moveto (OF DISABILITY) center-text
  770. 27 mm 197 mm moveto (Please see notice below) center-text
  771.  
  772. BOLD-FONT 8 scalefont setfont
  773.  
  774. 2 mm 155 mm moveto
  775. (WILLFUL FALSE STATEMENT IS PUNISHABLE BY FINE AND IMPRISONMENT ) show
  776. (\(U.S. CODE TITLE 18, SECTION 1001\)) show
  777.  
  778. 2 mm 140 mm moveto
  779. (PATIENT'S RELEASE) show
  780.  
  781. NORMAL-FONT 8 scalefont setfont
  782.  
  783. /line-to-end {
  784. currentpoint newpath moveto currentpoint exch pop 196 mm exch lineto stroke
  785. } def
  786.  
  787. 64 mm 204 mm moveto (Print, Type or stamp physician's name:  ) show
  788. line-to-end
  789. 64 mm 196 mm moveto (Street address:  ) show line-to-end
  790. 64 mm 188 mm moveto (City, State, ZIP code:  ) show line-to-end
  791. 64 mm 180 mm moveto (Office telephone number:  ) show
  792. gsave
  793. (   \(             \)) show
  794. grestore line-to-end
  795.  
  796. gsave
  797. DING-FONT 14 scalefont setfont
  798. 55 mm 147 mm moveto DING-ARROW
  799. 2 mm -1 mm rmoveto
  800. [ 82 mm 4 mm 17 mm 6 mm 25 mm 9 mm ] 0 setdash
  801. line-to-end
  802. grestore
  803.  
  804. NORMAL-FONT 6 scalefont setfont
  805. 62 mm 142 mm moveto (PHYSICIAN'S SIGNATURE \(DO NOT PRINT, ) show
  806. (TYPE, OR STAMP\)) show
  807. 150 mm 142 mm moveto (M.D. or D.O.) show
  808. 176 mm 142 mm moveto (DATE SIGNED) show
  809.  
  810. gsave
  811. DING-FONT 14 scalefont setfont
  812. 55 mm 126 mm moveto DING-ARROW
  813. 2 mm -1 mm rmoveto
  814. [ 82 mm 4 mm 48 mm 9 mm ] 0 setdash
  815. line-to-end
  816. grestore
  817.  
  818. 62 mm 121 mm moveto (APPLICANT'S SIGNATURE \(DO NOT PRINT, ) show
  819. (TYPE, OR STAMP\)) show
  820. 160 mm 121 mm moveto (DATE SIGNED) show
  821.  
  822. NORMAL-FONT 8 scalefont setfont
  823. 2 mm 196 mm 174 mm
  824. (I CERTIFY THAT I have read the Notice to Physician Certifying to a Disability, and that the person named in item 1 on the reverse is severely)
  825. justify-text
  826. 2 mm 196 mm 171 mm
  827. (handicapped, the duration of which will extend for more than 365 days beyond this date. Because of the severe handicap, this person is)
  828. justify-text
  829. 2 mm 196 mm 168 mm
  830. (unable to pass a 13 or 20 words per minute telegraphy examination. I am licensed to practice in the United States or its Territories as a doctor)
  831. justify-text
  832. 2 mm 196 mm 165 mm
  833. (of medicine \(M.D.\) or doctor of osteopathy \(D.O.\). I have considered the accommodations that could be made for this person's disability)
  834. justify-text
  835. 2 mm 196 mm 162 mm
  836. (and have determined that, even with accommodations, this person would be unable to pass a 13 or 20 words per minute telegraphy)
  837. justify-text
  838. 2 mm 159 mm moveto (examination.) show
  839. 2 mm 196 mm 136 mm
  840. (Authorization is hereby given to the physician named above, who participated in my care, to release to the Federal Communications)
  841. justify-text
  842. 2 mm 133 mm moveto
  843. (Commission any medical information deemed necessary to ) show
  844. (process my application for an amateur operator/primary ) show
  845. (station license.) show
  846.  
  847. % Welcome to hell. The "Notice to Physician..." part is two columns
  848. % of fully justified text. Yuck.
  849.  
  850. BOLD-FONT 8 scalefont setfont
  851. 99 mm 115 mm moveto
  852. (NOTICE TO PHYSICIAN CERTIFYING TO A DISABILITY) center-text
  853.  
  854. NORMAL-FONT 8 scalefont setfont
  855.  
  856. 5 mm 93 mm 109 mm
  857. (You are being asked by a person who has already passed a 5 words per)
  858. justify-text
  859. 5 mm 93 mm 106 mm
  860. (minute telegraphy examination to certify that, because of a severe)
  861. justify-text
  862. 5 mm 93 mm 103 mm
  863. (handicap, he/she is unable to pass a 13 or 20 words per minute)
  864. justify-text
  865. 5 mm 93 mm 100 mm
  866. (telegraphy examination. If you sign the certification, the person will be)
  867. justify-text
  868. 5 mm 93 mm 97 mm
  869. (exempt from the examination. Before you sign the certification, please)
  870. justify-text
  871. 5 mm 94 mm moveto
  872. (consider the following:) show
  873. 5 mm 93 mm 88 mm
  874. (THE REASON FOR THE EXAMINATION - Telegraphy is a method of)
  875. justify-text
  876. 5 mm 93 mm 85 mm
  877. (electrical communication that the Amateur Radio Service community)
  878. justify-text
  879. 5 mm 93 mm 82 mm
  880. (strongly desires to preserve. We support their objective by authorizing)
  881. justify-text
  882. 5 mm 93 mm 79 mm
  883. (additional operating privileges to amateur operators who increase their)
  884. justify-text
  885. 5 mm 93 mm 76 mm
  886. (skills to 13 and 20 words per minute. Normally, to attain these levels of skill,)
  887. justify-text
  888. 5 mm 93 mm 73 mm
  889. (intense practice is required. Annually, thousands of amateur operators)
  890. justify-text
  891. 5 mm 93 mm 70 mm
  892. (prove by passing examinations that they have acquired the skill. These)
  893. justify-text
  894. 5 mm 93 mm 67 mm
  895. (examinations are prepared and administered by amateur operators in)
  896. justify-text
  897. 5 mm 64 mm moveto
  898. (the local community who volunteer their time and effort.) show
  899. 5 mm 93 mm 58 mm
  900. (THE EXAMINATION PROCEDURE - The volunteer examiners \(VEs\) send a)
  901. justify-text
  902. 5 mm 93 mm 55 mm
  903. (short message in the Morse code. The examinee must decipher a series)
  904. justify-text
  905. 5 mm 93 mm 52 mm
  906. (of audible dots and dashes into 43 different alphabetic, numeric and)
  907. justify-text
  908. 5 mm 93 mm 49 mm
  909. (punctuation characters used in the message. To pass, the examinee)
  910. justify-text
  911. 5 mm 93 mm 46 mm
  912. (must correctly answer questions about the content of the message.)
  913. justify-text
  914. 5 mm 93 mm 43 mm
  915. (Usually, a fill-in-the-blanks format is used. With your certification, they will)
  916. justify-text
  917. 5 mm 93 mm 40 mm
  918. (give the person credit for passing the examination, even though they do)
  919. justify-text
  920. 5 mm 37 mm moveto
  921. (not administer it.) show
  922. 5 mm 31 mm moveto
  923. (MUST A PERSON WITH A HANDICAP SEEK EXEMPTION?) show
  924. 5 mm 93 mm 25 mm
  925. (No handicapped person is required to request exemption from the)
  926. justify-text
  927. 5 mm 93 mm 22 mm
  928. (higher speed telegraphy examinations, nor is anyone denied the)
  929. justify-text
  930. 5 mm 93 mm 19 mm
  931. (opportunity to take the examinations because of a handicap. There is)
  932. justify-text
  933. 5 mm 93 mm 16 mm
  934. (available to all otherwise qualified persons, handicapped or not, the)
  935. justify-text
  936. 5 mm 93 mm 13 mm
  937. (Technician Class operator license that does not require passing a)
  938. justify-text
  939. 5 mm 93 mm 10 mm
  940. (telegraphy examination. Because of international regulations, however,)
  941. justify-text
  942. 5 mm 93 mm 7 mm
  943. (any handicapped applicant requesting exemption from the 13 or 20)
  944. justify-text
  945. 5 mm 93 mm 4 mm
  946. (words per minute examination must have passed the 5 words per minute)
  947. justify-text
  948. 5 mm 1 mm moveto
  949. (examination.) show
  950.  
  951. 104 mm 192 mm 109 mm
  952. (ACCOMMODATING A HANDICAPPED PERSON - Many handicapped)
  953. justify-text
  954. 104 mm 192 mm 106 mm
  955. (persons accept and benefit from the personal challenge of passing the)
  956. justify-text
  957. 104 mm 192 mm 103 mm
  958. (examination in spite of their hardships. For handicapped persons without)
  959. justify-text
  960. 104 mm 192 mm 100 mm
  961. (an exemption who have difficulty in proving that they can decipher)
  962. justify-text
  963. 104 mm 192 mm 97 mm
  964. (messages sent in the Morse code, the VE's make exceptionally)
  965. justify-text
  966. 104 mm 192 mm 94 mm
  967. (accommodative arrangements. They will adjust the tone in frequency)
  968. justify-text
  969. 104 mm 192 mm 91 mm
  970. (and volume to suit the examinee. They will administer the examination at)
  971. justify-text
  972. 104 mm 192 mm 88 mm
  973. (a place convenient and comfortable to the examinee, even at bedside.)
  974. justify-text
  975. 104 mm 192 mm 85 mm
  976. (For a deaf person, they will send the dots and dashes to a vibrating)
  977. justify-text
  978. 104 mm 192 mm 82 mm
  979. (surface or flashing light. They will write the examinee's dictation. Where)
  980. justify-text
  981. 104 mm 192 mm 79 mm
  982. (warranted, they will pause in sending the message after each sentence,)
  983. justify-text
  984. 104 mm 192 mm 76 mm
  985. (each phrase, each word, or each character to allow the examinee)
  986. justify-text
  987. 104 mm 192 mm 73 mm
  988. (additional time to absorb and interpret what was sent. They will even)
  989. justify-text
  990. 104 mm 70 mm moveto
  991. (allow the examinee to send the message, rather than receive it.) show
  992. 104 mm 192 mm 62 mm
  993. (YOUR DECISION - The VEs rely upon you to make the necessary medical)
  994. justify-text
  995. 104 mm 192 mm 59 mm
  996. (determination for them using your professional judgement. You are)
  997. justify-text
  998. 104 mm 192 mm 56 mm
  999. (being asked to decide if the person's handicap is so severe that he/she)
  1000. justify-text
  1001. 104 mm 192 mm 53 mm
  1002. (cannot pass the examination even when the VEs employ their)
  1003. justify-text
  1004. 104 mm 192 mm 50 mm
  1005. (accommodative procedures. The impairment, moreover, will last more)
  1006. justify-text
  1007. 104 mm 192 mm 47 mm
  1008. (than one year. This procedure is not intended to exempt a person who)
  1009. justify-text
  1010. 104 mm 192 mm 44 mm
  1011. (simply wants to avoid expending the effort necessary to acquire greater)
  1012. justify-text
  1013. 104 mm 192 mm 41 mm
  1014. (skill in telegraphy. The person requesting that you sign the certification)
  1015. justify-text
  1016. 104 mm 192 mm 38 mm
  1017. (will give you names and addresses of VEs and other amateur operators)
  1018. justify-text
  1019. 104 mm 192 mm 35 mm
  1020. (in your community who can provide you with more information on this)
  1021. justify-text
  1022. 104 mm 32 mm moveto
  1023. (matter.) show
  1024. 104 mm 192 mm 25 mm
  1025. (DETAILED INSTRUCTIONS - If you decide to execute the certification, you)
  1026. justify-text
  1027. 104 mm 192 mm 22 mm
  1028. (should complete and sign the Physician's Certification of Disability on the)
  1029. justify-text
  1030. 104 mm 192 mm 19 mm
  1031. (person's FCC Form 610. You must be an M.D. or D.O. licensed to)
  1032. justify-text
  1033. 104 mm 192 mm 16 mm
  1034. (practice in the United States or its Territories. The person must sign a)
  1035. justify-text
  1036. 104 mm 192 mm 13 mm
  1037. (release permitting disclosure to the FCC of the medical information)
  1038. justify-text
  1039. 104 mm 10 mm moveto
  1040. (pertaining to the disability.) show
  1041. 192 mm 4 mm moveto
  1042. (FCC Form 610) right-justify
  1043. 192 mm 1 mm moveto
  1044. (November 1993) right-justify
  1045.  
  1046. showpage
  1047.  
  1048. %%Trailer
  1049. %%EOF
  1050. ----- ereh tuc -----
  1051. -- 
  1052. Nick Sayer <nsayer@quack.kfu.com>    | "Oh joy! See how I love to clean
  1053. N6QQQ @ N0ARY.#NOCAL.CA.USA.NOAM     |  filthy cat boxes!"
  1054. +1 408 249 9630, log in as 'guest'   | 
  1055. PGP 2.2 key and geek code via finger |     -- Ren (with Happy Helmet)
  1056.